home *** CD-ROM | disk | FTP | other *** search
/ Digital Talk 5 / Digital_Talk_05_1994-01-30_Digital_Talk_de_Side_B.d64 / raster-basic (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  222b  |  8 lines
  1. 1 sys49152
  2. 10 fora=0to120:poke49664+a,a:next
  3. 20 fora=0to120:poke49664+256*1+a,a/2:next
  4. 30 fora=0to120:poke49664+256*2+a,2:next
  5. 40 fora=120to0 step-1:poke49664+256*3+a,3:next
  6. 50 fora=0to120:poke49664+256*4+a,rnd(1)*17+1:next
  7. 60 fora=0to120:poke49664+256*5+a,rnd(1)*3+1:next
  8.